home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1998 September
/
CHIP NET Rehberi Eylül 1998.iso
/
ftp
/
32paft
/
_SETUP.1
/
FTP.EXE
/
0
/
RCDATA
/
TMAINFORM
/
TMAINFORM.txt
< prev
Wrap
Text File
|
1998-05-15
|
50KB
|
1,356 lines
object MainForm: TMainForm
Left = 72
Top = 181
AutoScroll = False
Caption = 'PrimaSoft AutoFTP'
ClientHeight = 420
ClientWidth = 546
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -10
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
ShowHint = True
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnHide = FormHide
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 0
Top = 0
Width = 546
Height = 2
Align = alTop
Shape = bsTopLine
end
object Panel1: TPanel
Left = 0
Top = 2
Width = 546
Height = 30
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object ConnectBtn: TSpeedButton
Left = 2
Top = 2
Width = 27
Height = 27
Hint = 'Connect'
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
7777777777777777777777777777777777777777777777777777777777777777
7777777777777777777777777777777777777777777777777777777777777777
777777777777777777777777777777777770000770000777777777777702220F
F0222077777777777702220FF0222077777777777702220FF022207777777770
0002220FF0222000077777700002220FF0222000077777777702220FF0222077
777777777702220FF0222077777777777702220FF02220777777777777700007
7000077777777777777777777777777777777777777777777777777777777777
7777777777777777777777777777777777777777777777777777777777777777
7777777777777777777777777777777777777777777777777777}
OnClick = ConnectBtnClick
end
object SpeedButton1: TSpeedButton
Left = 44
Top = 2
Width = 27
Height = 27
Hint = 'View/Hide Transfer Manager'
AllowAllUp = True
GroupIndex = 2
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333FFFFFFFFFFFFFFF000000000000000077777777777777770FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07F3FF3FF3FF3FFF70F00F00F00F000F07F773773773777370FFFFFFFFFFF
FFF07FFFFFFFFFFFFFF70CCCCCCCCCCCCCC07777777777777777088CCCCCCCCC
C8807FF7777777777FF700000000000000007777777777777777333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 71
Top = 2
Width = 27
Height = 27
Hint = 'View/Hide Transfer Scheduler'
AllowAllUp = True
GroupIndex = 3
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300130000031
00333773F77777FF7733331000909000133333377737F777FF33330098F0F890
0333337733F733F77F33370980FFF08907333373373F373373F33099FFFFFFF9
903337F3F373F33FF7F33090F000FF00903337F73337F37737F3B099FFF0FFF9
90B3373F33F7F3F33733070980F0F0890703337FF737F7337F33BB0098F0F890
0BB33F77FF3733377FFF000009999900000377777FFFFF77777F088700000008
77037F3377777773337F088887707888870373F3337773F33373B078800B0088
70B3373FF733373FF73303700BBBBB007303337773F3F3777F33330BB0B0B0BB
033333733737F73F73F330BB03B0B30BB0333733733733733733}
NumGlyphs = 2
OnClick = SpeedButton2Click
end
object LogBtn: TSpeedButton
Left = 98
Top = 2
Width = 27
Height = 27
Hint = 'View/Hide Log'
AllowAllUp = True
GroupIndex = 4
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333FF3333333333333C0C333333333333F777F3333333333CC0F0C3
333333333777377F33333333C30F0F0C333333337F737377F333333C00FFF0F0
C33333F7773337377F333CC0FFFFFF0F0C3337773F33337377F3C30F0FFFFFF0
F0C37F7373F33337377F00FFF0FFFFFF0F0C7733373F333373770FFFFF0FFFFF
F0F073F33373F333373730FFFFF0FFFFFF03373F33373F333F73330FFFFF0FFF
00333373F33373FF77333330FFFFF000333333373F333777333333330FFF0333
3333333373FF7333333333333000333333333333377733333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
OnClick = ViewLog1Click
end
object AssistantBtn: TSpeedButton
Left = 125
Top = 2
Width = 27
Height = 27
Hint = 'AutoFTP Assistant'
AllowAllUp = True
GroupIndex = 5
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
333333333337FF3333333333330003333333333333777F333333333333080333
3333333F33777FF33F3333B33B000B33B3333373F777773F7333333BBB0B0BBB
33333337737F7F77F333333BBB0F0BBB33333337337373F73F3333BBB0F7F0BB
B333337F3737F73F7F3333BB0FB7BF0BB3333F737F37F37F73FFBBBB0BF7FB0B
BBB3773F7F37337F377333BB0FBFBF0BB333337F73F333737F3333BBB0FBF0BB
B3333373F73FF7337333333BBB000BBB33333337FF777337F333333BBBBBBBBB
3333333773FF3F773F3333B33BBBBB33B33333733773773373333333333B3333
333333333337F33333333333333B333333333333333733333333}
NumGlyphs = 2
OnClick = Assistant1Click
end
object Panel10: TPanel
Left = 163
Top = 0
Width = 115
Height = 30
BevelOuter = bvNone
TabOrder = 0
object LargeBtn: TSpeedButton
Left = 2
Top = 2
Width = 27
Height = 27
Hint = 'Large Icons'
GroupIndex = 1
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333000000003333333
3333333333333333333333333333333334444444433333333333333334FFFFFF
433333333333333334FFFFFF433333333333333334FFFFFF4333333333333333
34FFFFFF433333333333333334FFFFFF433333000000003334FFFFFF43333333
3333333334FFFFFF433333444444443334FFFFF44333334FFFFFF43334444444
3333334FFFFFF433333333333333334FFFFFF433333333333333334FFFFFF433
333333333333334FFFFFF433333333333333334FFFFFF433333333333333334F
FFFFF433333333333333334FFFFF443333333333333333444444433333333333
3333333333333333333333333333333333333333333333333333}
OnClick = ViewLargeItemClick
end
object SmallBtn: TSpeedButton
Left = 29
Top = 2
Width = 27
Height = 27
Hint = 'Small Icons'
GroupIndex = 1
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333333333334444433333333333333333334F
FF433333333333333333334FFF430000033333333333334FFF43333333333333
3333334FF4433333333333333333334444333333333333333333333333333333
33333333333333333333334444433333333333333333334FFF43333333333333
3333334FFF430000033333333333334FFF433333333333333333334FF4433333
3333333333333344443333333333333333333333333333333333334444433333
333333333333334FFF433333333333333333334FFF430000033333333333334F
FF433333333333333333334FF443333333333333333333444433333333333333
3333333333333333333333333333333333333333333333333333}
OnClick = ViewSmallItemClick
end
object ListBtn: TSpeedButton
Left = 56
Top = 2
Width = 27
Height = 27
Hint = 'List'
GroupIndex = 1
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333333
33333333333333333333334444333333344443333333334FF430000334FF4300
0033334FF433333334FF43333333334444333333344443333333333333333333
3333333333333333333333333333333333333333333333333333333333333344
44333333344443333333334FF430003334FF43000033334FF433333334FF4333
3333334444333333344443333333333333333333333333333333333333333333
333333333333333333333333333333333333334444333333344443333333334F
F430000334FF43000033334FF433333334FF4333333333444433333334444333
3333333333333333333333333333333333333333333333333333}
OnClick = ViewListItemClick
end
object DetailsBtn: TSpeedButton
Left = 83
Top = 2
Width = 27
Height = 27
Hint = 'Details'
GroupIndex = 1
Down = True
Glyph.Data = {
96010000424D9601000000000000760000002800000018000000180000000100
0400000000002001000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333333333333333333333333333333333333333333333333333333344
4330000300003000033333333333333333333333333333444330000300003000
0333333333333333333333333333334443300003000030000333333333333333
3333333333333344433000030000300003333333333333333333333333333344
4330000300003000033333333333333333333333333333444330000300003000
0333333333333333333333333333334443300003000030000333333333333333
3333333333333344433000030000300003333333333333333333333333333344
4444444444444444443333333333333333333333333333333330000300003000
0333333333333333333333333333333333333333333333333333}
OnClick = ViewDetailsItemClick
end
end
end
object StatusBar: TStatusBar
Left = 0
Top = 404
Width = 546
Height = 16
Panels = <
item
Width = 450
end
item
Width = 70
end>
SimplePanel = False
end
object FTP: TFTP
Left = 428
Top = 5
Width = 32
Height = 32
OnStateChanged = FTPStateChanged
OnProtocolStateChanged = FTPProtocolStateChanged
OnBusy = FTPBusy
OnDocOutput = FTPDocOutput
OnAbort = FTPAbort
OnChangeDir = FTPChangeDir
OnPrintDir = FTPPrintDir
OnListItem = FTPListItem
ControlData = {
2143341208000000E5020000E50200000A0000003132372E302E302E31001500
00000000000000000000000001000000000100000000000101000000000C00A0}
end
object Panel2: TPanel
Left = 0
Top = 185
Width = 546
Height = 150
Align = alClient
BevelOuter = bvNone
TabOrder = 3
object Panel4: TPanel
Left = 0
Top = 0
Width = 160
Height = 150
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Bevel2: TBevel
Left = 0
Top = 21
Width = 160
Height = 22
Align = alTop
end
object Label1: TLabel
Left = 4
Top = 3
Width = 77
Height = 13
Caption = 'Remote System:'
end
object Bevel9: TBevel
Left = 0
Top = 0
Width = 160
Height = 21
Align = alTop
end
object DirTree: TTreeView
Left = 0
Top = 43
Width = 160
Height = 107
Hint = 'Select Remote File Folders Here'
ReadOnly = True
Indent = 19
OnChanging = DirTreeChanging
OnChange = DirTreeChange
Align = alClient
ParentCtl3D = False
Ctl3D = True
TabOrder = 1
OnDragDrop = DirTreeDragDrop
OnDragOver = DirTreeDragOver
Images = SmallImages
end
object RemoteSiteCB: TComboBox
Left = 1
Top = 22
Width = 160
Height = 21
Hint = 'Quick Conect - Select A Remote Site From The List'
Style = csDropDownList
ItemHeight = 13
Sorted = True
TabOrder = 0
OnChange = RemoteSiteCBChange
end
end
object Panel3: TPanel
Left = 163
Top = 0
Width = 383
Height = 150
Align = alClient
BevelOuter = bvNone
Caption = 'Panel3'
TabOrder = 1
object Bevel3: TBevel
Left = 0
Top = 0
Width = 383
Height = 21
Align = alTop
end
object Bevel5: TBevel
Left = 0
Top = 21
Width = 2
Height = 96
Align = alLeft
Shape = bsLeftLine
end
object Label2: TLabel
Left = 4
Top = 3
Width = 59
Height = 13
Caption = 'Contents Of '
end
object FileList: TListView
Left = 2
Top = 21
Width = 381
Height = 96
Hint = 'Click on Filename to select a remote file'
Align = alClient
OnDblClick = FileListDblClick
Columns = <
item
Caption = 'Filename'
Width = 100
end
item
Alignment = taRightJustify
Caption = 'Size'
Width = 60
end
item
Caption = 'Type'
Width = 120
end
item
Caption = 'Date'
Width = 80
end>
ReadOnly = True
MultiSelect = True
OnChange = FileListChange
OnColumnClick = FileListColumnClick
OnCompare = FileList0Compare
OnEditing = FileList0Editing
OnDragDrop = FileListDragDrop
OnDragOver = FileListDragOver
OnEndDrag = FileListEndDrag
OnMouseDown = FileList0MouseDown
PopupMenu = FilePopup
TabOrder = 0
ViewStyle = vsReport
end
object Panel9: TPanel
Left = 0
Top = 117
Width = 383
Height = 33
Align = alBottom
BevelOuter = bvLowered
TabOrder = 1
object RefreshBtn: TSpeedButton
Left = 148
Top = 3
Width = 27
Height = 27
Hint = 'Refresh'
Enabled = False
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333FFFFF3333000033333808333333333FF3338833330000333800833333
3333833338333333000033300833333333338333833333330000338083333333
3338333F3333333300003300333333333338333F3FFFFFF30000330033300000
3338333F833333F300003300833380003338333F383333F30000338008380000
33383333F33333F3000033300000008033338333333383F30000333380008330
33333833333883F3000033333333333333333388888338330000333333333333
33333333333333330000}
NumGlyphs = 2
OnClick = RefreshBtnClick
end
object DownloadBtn: TSpeedButton
Left = 6
Top = 3
Width = 27
Height = 27
Hint = 'Download Remote File(s)'
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333330333333
3333333330333330003333330903333003033333090333300300333099903330
0300333099903330030033099999033003003309999903300303309999999030
0033300009000033333333330903333333333333090333333333333309033333
3333333309033333333333330903333333333333000333333333}
OnClick = DownloadBtnClick
end
object Rename1Btn: TSpeedButton
Left = 48
Top = 3
Width = 27
Height = 27
Hint = 'Rename File'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
7700333333337777777733333333008088003333333377F73377333333330088
88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
OnClick = Rename1Click
end
object Delete1Btn: TSpeedButton
Left = 75
Top = 3
Width = 27
Height = 27
Hint = 'Delete Selected File(s)'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F3333333333000003333333333377777333333}
NumGlyphs = 2
OnClick = DeleteItemClick
end
object New1Btn: TSpeedButton
Left = 103
Top = 3
Width = 27
Height = 27
Hint = 'Create New Folder'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555555555555555555555555555555
55555555FFFFFFFFFF5555500000000005555557777777777F55550BFBFBFBFB
0555557F555555557F55550FBFBFBFBF0555557F555555557F55550BFBFBFBFB
0555557F555555557F55550FBFBFBFBF0555557F555555557F55550BFBFBFBFB
0555557F555555557F55550FBFBFBFBF0555557FFFFFFFFF7555550000000000
555555777777777755555550FBFB0555555555575FFF75555555555700007555
5555555577775555555555555555555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555}
NumGlyphs = 2
OnClick = FileNewItemClick
end
object SaveDirBtn: TSpeedButton
Left = 191
Top = 3
Width = 27
Height = 27
Hint = 'Memorize File Folder'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00303333333333
333337F3333333333333303333333333333337F33FFFFF3FF3FF303300000300
300337FF77777F77377330000BBB0333333337777F337F33333330330BB00333
333337F373F773333333303330033333333337F3377333333333303333333333
333337F33FFFFF3FF3FF303300000300300337FF77777F77377330000BBB0333
333337777F337F33333330330BB00333333337F373F773333333303330033333
333337F3377333333333303333333333333337FFFF3FF3FFF333000003003000
333377777F77377733330BBB0333333333337F337F33333333330BB003333333
333373F773333333333330033333333333333773333333333333}
NumGlyphs = 2
OnClick = SaveDir1Click
end
object StopBtn: TSpeedButton
Left = 219
Top = 3
Width = 27
Height = 27
Hint = 'Stop Current FTP Operation'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
993337777F777F3377F3393999707333993337F77737333337FF993399933333
399377F3777FF333377F993339903333399377F33737FF33377F993333707333
399377F333377FF3377F993333101933399377F333777FFF377F993333000993
399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
99333773FF777F777733339993707339933333773FF7FFF77333333999999999
3333333777333777333333333999993333333333377777333333}
NumGlyphs = 2
OnClick = StopBtnClick
end
object DirUpBtn1: TSpeedButton
Left = 261
Top = 3
Width = 27
Height = 27
Hint = 'One Level Up'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555555555555555555555000000000
00555555FFFFFFFFFF55550FBFBFBFBFB0555558888888888F55550BF999999B
F055558F555555558F55550FB9BFBFBFB055558F555555558F5555099999FBFB
F055558F555555558F55550F999FBFBFB055558F555555558F55550BF9FBFBFB
F055558F555555558F55550FBFBFBFBFB055558FFFFFFFFF8555550000000000
055555888888888855555550FBFB0555555555585FFF85555555555800008555
5555555588885555555555555555555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555}
NumGlyphs = 2
OnClick = DirUpBtn1Click
end
end
object ComboBox1: TComboBox
Left = 65
Top = 0
Width = 315
Height = 21
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ItemHeight = 13
ParentFont = False
TabOrder = 2
OnClick = ComboBox1Click
OnKeyUp = ComboBox1KeyUp
end
end
object Splitter2: TPanel
Left = 160
Top = 0
Width = 3
Height = 150
Cursor = crHSplit
Align = alLeft
BevelOuter = bvNone
TabOrder = 2
OnMouseDown = Splitter2MouseDown
OnMouseMove = Splitter1MouseMove
OnMouseUp = Splitter1MouseUp
end
end
object Panel5: TPanel
Left = 0
Top = 32
Width = 546
Height = 150
Align = alTop
BevelOuter = bvNone
Caption = 'Panel5'
TabOrder = 4
object Panel6: TPanel
Left = 0
Top = 0
Width = 160
Height = 150
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object Bevel4: TBevel
Left = 0
Top = 0
Width = 160
Height = 21
Align = alTop
end
object Label3: TLabel
Left = 4
Top = 3
Width = 66
Height = 13
Caption = 'Local System:'
end
object Bevel8: TBevel
Left = 0
Top = 21
Width = 160
Height = 20
Align = alTop
end
object DriveComboBox1: TDriveComboBox
Left = 1
Top = 22
Width = 158
Height = 19
Hint = 'Select A Local Disk Drive From The List'
TabOrder = 0
OnChange = DriveComboBox1Change
end
object DirTree0: TDirectoryTree
Left = 0
Top = 41
Width = 160
Height = 109
Hint = 'Select Local File Folders Here'
Drive = 'C'
Directory = 'C:\'
Indent = 19
Items.Data = {
010000001B0000000000000000000000FFFFFFFFFFFFFFFF0100000028000000
02433A1A0000000000000000000000FFFFFFFFFFFFFFFF000000000000000001
61210000000000000000000000FFFFFFFFFFFFFFFF0000000001000000084163
726F72656164190000000000000000000000FFFFFFFFFFFFFFFF000000000000
000000240000000000000000000000FFFFFFFFFFFFFFFF00000000010000000B
416374697665416453444B190000000000000000000000FFFFFFFFFFFFFFFF00
00000000000000001F0000000000000000000000FFFFFFFFFFFFFFFF00000000
0100000006416D6970726F190000000000000000000000FFFFFFFFFFFFFFFF00
00000000000000001C0000000000000000000000FFFFFFFFFFFFFFFF00000000
0100000003417370190000000000000000000000FFFFFFFFFFFFFFFF00000000
0000000000210000000000000000000000FFFFFFFFFFFFFFFF00000000010000
00084173723332333130190000000000000000000000FFFFFFFFFFFFFFFF0000
000000000000001C0000000000000000000000FFFFFFFFFFFFFFFF0000000000
000000034261741B0000000000000000000000FFFFFFFFFFFFFFFF0000000001
000000024270190000000000000000000000FFFFFFFFFFFFFFFF000000000000
0000001E0000000000000000000000FFFFFFFFFFFFFFFF000000000000000005
4364726F6D1D0000000000000000000000FFFFFFFFFFFFFFFF00000000010000
000444617461190000000000000000000000FFFFFFFFFFFFFFFF000000000000
0000001F0000000000000000000000FFFFFFFFFFFFFFFF000000000000000006
4462326C6F671C0000000000000000000000FFFFFFFFFFFFFFFF000000000100
000003446264190000000000000000000000FFFFFFFFFFFFFFFF000000000000
0000001F0000000000000000000000FFFFFFFFFFFFFFFF000000000100000006
44656C706869190000000000000000000000FFFFFFFFFFFFFFFF000000000000
0000001F0000000000000000000000FFFFFFFFFFFFFFFF000000000100000006
446F73507267190000000000000000000000FFFFFFFFFFFFFFFF000000000000
000000200000000000000000000000FFFFFFFFFFFFFFFF000000000100000007
456E6361723936190000000000000000000000FFFFFFFFFFFFFFFF0000000000
00000000210000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
0845786368616E6765210000000000000000000000FFFFFFFFFFFFFFFF000000
000100000008466178776F726B73190000000000000000000000FFFFFFFFFFFF
FFFF0000000000000000001E0000000000000000000000FFFFFFFFFFFFFFFF00
000000010000000567616D6573190000000000000000000000FFFFFFFFFFFFFF
FF000000000000000000200000000000000000000000FFFFFFFFFFFFFFFF0000
0000010000000749626C6F63616C190000000000000000000000FFFFFFFFFFFF
FFFF0000000000000000001E0000000000000000000000FFFFFFFFFFFFFFFF00
00000001000000054964617069190000000000000000000000FFFFFFFFFFFFFF
FF0000000000000000001F0000000000000000000000FFFFFFFFFFFFFFFF0000
00000100000006496C69623235190000000000000000000000FFFFFFFFFFFFFF
FF000000000000000000210000000000000000000000FFFFFFFFFFFFFFFF0000
00000100000008496E7465726E6574190000000000000000000000FFFFFFFFFF
FFFFFF0000000000000000001F0000000000000000000000FFFFFFFFFFFFFFFF
000000000000000006494F4D656761200000000000000000000000FFFFFFFFFF
FFFFFF0000000001000000074D73696E707574190000000000000000000000FF
FFFFFFFFFFFFFF000000000000000000200000000000000000000000FFFFFFFF
FFFFFFFF0000000000000000074D736A756C6961200000000000000000000000
FFFFFFFFFFFFFFFF0000000001000000074D736D6F6E65791900000000000000
00000000FFFFFFFFFFFFFFFF0000000000000000001E00000000000000000000
00FFFFFFFFFFFFFFFF0000000000000000055063646972210000000000000000
000000FFFFFFFFFFFFFFFF000000000100000008506C7567706C617919000000
0000000000000000FFFFFFFFFFFFFFFF0000000000000000001E000000000000
0000000000FFFFFFFFFFFFFFFF0000000001000000055072696D611900000000
00000000000000FFFFFFFFFFFFFFFF0000000000000000002600000000000000
00000000FFFFFFFFFFFFFFFF00000000010000000D50726F6772616D2046696C
6573190000000000000000000000FFFFFFFFFFFFFFFF00000000000000000021
0000000000000000000000FFFFFFFFFFFFFFFF00000000010000000851756963
6B656E77190000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
001D0000000000000000000000FFFFFFFFFFFFFFFF0000000001000000045265
616C190000000000000000000000FFFFFFFFFFFFFFFF0000000000000000001E
0000000000000000000000FFFFFFFFFFFFFFFF00000000010000000552707072
6F190000000000000000000000FFFFFFFFFFFFFFFF0000000000000000001E00
00000000000000000000FFFFFFFFFFFFFFFF0000000001000000057368726567
190000000000000000000000FFFFFFFFFFFFFFFF000000000000000000210000
000000000000000000FFFFFFFFFFFFFFFF000000000100000008746565636861
7274190000000000000000000000FFFFFFFFFFFFFFFF0000000000000000001D
0000000000000000000000FFFFFFFFFFFFFFFF00000000000000000454656D70
1C0000000000000000000000FFFFFFFFFFFFFFFF000000000000000003566564
200000000000000000000000FFFFFFFFFFFFFFFF000000000100000007566962
72613136190000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
001E0000000000000000000000FFFFFFFFFFFFFFFF0000000001000000055769
6E3331190000000000000000000000FFFFFFFFFFFFFFFF000000000000000000
200000000000000000000000FFFFFFFFFFFFFFFF00000000010000000757696E
646F7773190000000000000000000000FFFFFFFFFFFFFFFF0000000000000000
00}
OnEdited = DirTree0Edited
OnChange = DirTree0Change
Align = alClient
ParentColor = False
TabOrder = 1
OnDragDrop = DirTree0DragDrop
OnDragOver = DirTree0DragOver
end
end
object Panel7: TPanel
Left = 163
Top = 0
Width = 383
Height = 150
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Bevel6: TBevel
Left = 0
Top = 0
Width = 383
Height = 21
Align = alTop
end
object Bevel7: TBevel
Left = 0
Top = 21
Width = 2
Height = 96
Align = alLeft
Shape = bsLeftLine
end
object Label4: TLabel
Left = 4
Top = 3
Width = 59
Height = 13
Caption = 'Contents Of '
end
object FileList0: TListView
Left = 2
Top = 21
Width = 381
Height = 96
Hint = 'Click on Filename to select a local file'
Align = alClient
OnDblClick = FileList0DblClick
Columns = <
item
Caption = 'Filename'
Width = 100
end
item
Alignment = taRightJustify
Caption = 'Size'
Width = 60
end
item
Caption = 'Type'
Width = 120
end
item
Caption = 'Date'
Width = 80
end>
MultiSelect = True
OnChange = FileList0Change
OnColumnClick = FileList0ColumnClick
OnCompare = FileList0Compare
OnEdited = FileList0Edited
OnEditing = FileList0Editing
OnDragDrop = FileList0DragDrop
OnDragOver = FileList0DragOver
OnEndDrag = FileList0EndDrag
OnMouseDown = FileList0MouseDown
PopupMenu = FilePopup0
TabOrder = 0
ViewStyle = vsReport
end
object Panel8: TPanel
Left = 0
Top = 117
Width = 383
Height = 33
Align = alBottom
BevelOuter = bvLowered
TabOrder = 1
object RefreshBtn0: TSpeedButton
Left = 148
Top = 3
Width = 27
Height = 27
Hint = 'Refresh'
Glyph.Data = {
46010000424D460100000000000076000000280000001C0000000D0000000100
040000000000D000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
3333333FFFFF3333000033333808333333333FF3338833330000333800833333
3333833338333333000033300833333333338333833333330000338083333333
3338333F3333333300003300333333333338333F3FFFFFF30000330033300000
3338333F833333F300003300833380003338333F383333F30000338008380000
33383333F33333F3000033300000008033338333333383F30000333380008330
33333833333883F3000033333333333333333388888338330000333333333333
33333333333333330000}
NumGlyphs = 2
OnClick = RefreshBtn0Click
end
object UploadBtn: TSpeedButton
Left = 6
Top = 3
Width = 27
Height = 27
Hint = 'Upload File(s) To Remote System'
Enabled = False
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000333333
3333333090333330000333309033330003003330903333003300333090333300
3300333090333300330000009000030033000999999903003300309999903300
3300309999903333333333099903333333333309990333333333333090333333
3333333090333333333333330333333333333333033333333333}
OnClick = UploadBtnClick
end
object Rename0Btn: TSpeedButton
Left = 48
Top = 3
Width = 27
Height = 27
Hint = 'Rename File/Folder'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
7700333333337777777733333333008088003333333377F73377333333330088
88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
93337FFFF7737777733300000033333333337777773333333333}
NumGlyphs = 2
OnClick = Rename0Click
end
object Delete0Btn: TSpeedButton
Left = 76
Top = 3
Width = 27
Height = 27
Hint = 'Delete Selected File(s)'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
3333333337FFF7F3333333333000003333333333377777333333}
NumGlyphs = 2
OnClick = Delete0Click
end
object New0Btn: TSpeedButton
Left = 103
Top = 3
Width = 27
Height = 27
Hint = 'Create New Folder'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555555555555555555555555555555
55555555FFFFFFFFFF5555500000000005555557777777777F55550BFBFBFBFB
0555557F555555557F55550FBFBFBFBF0555557F555555557F55550BFBFBFBFB
0555557F555555557F55550FBFBFBFBF0555557F555555557F55550BFBFBFBFB
0555557F555555557F55550FBFBFBFBF0555557FFFFFFFFF7555550000000000
555555777777777755555550FBFB0555555555575FFF75555555555700007555
5555555577775555555555555555555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555}
NumGlyphs = 2
OnClick = NewFolder0Click
end
object View0Btn: TSpeedButton
Left = 191
Top = 3
Width = 27
Height = 27
Hint = 'View Selected File(s)'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
00333377737FFFFF773333303300000003333337337777777333}
NumGlyphs = 2
OnClick = ViewFile0Click
end
object Execute0Btn: TSpeedButton
Left = 218
Top = 3
Width = 27
Height = 27
Hint = 'Execute Selected File/Application'
Enabled = False
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
33333333333333333333EEEEEEEEEEEEEEE333FFFFFFFFFFFFF3E00000000000
00E337777777777777F3E0F77777777770E337F33333333337F3E0F333333333
70E337F3333F333337F3E0F33303333370E337F3337FF33337F3E0F333003333
70E337F33377FF3337F3E0F33300033370E337F333777FF337F3E0F333000033
70E337F33377773337F3E0F33300033370E337F33377733337F3E0F333003333
70E337F33377333337F3E0F33303333370E337F33373333337F3E0F333333333
70E337F33333333337F3E0FFFFFFFFFFF0E337FFFFFFFFFFF7F3E00000000000
00E33777777777777733EEEEEEEEEEEEEEE33333333333333333}
NumGlyphs = 2
OnClick = Execute0Click
end
object DirUpBtn0: TSpeedButton
Left = 261
Top = 3
Width = 27
Height = 27
Hint = 'One Level Up'
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
5555555555555555555555555555555555555555555555555555555000000000
00555555FFFFFFFFFF55550FBFBFBFBFB0555558888888888F55550BF999999B
F055558F555555558F55550FB9BFBFBFB055558F555555558F5555099999FBFB
F055558F555555558F55550F999FBFBFB055558F555555558F55550BF9FBFBFB
F055558F555555558F55550FBFBFBFBFB055558FFFFFFFFF8555550000000000
055555888888888855555550FBFB0555555555585FFF85555555555800008555
5555555588885555555555555555555555555555555555555555555555555555
5555555555555555555555555555555555555555555555555555}
NumGlyphs = 2
OnClick = DirUpBtn0Click
end
end
end
object Splitter1: TPanel
Left = 160
Top = 0
Width = 3
Height = 150
Cursor = crHSplit
Align = alLeft
BevelOuter = bvNone
TabOrder = 2
OnMouseDown = Splitter1MouseDown
OnMouseMove = Splitter1MouseMove
OnMouseUp = Splitter1MouseUp
end
end
object Splitter3: TPanel
Left = 0
Top = 182
Width = 546
Height = 3
Cursor = crVSplit
Align = alTop
BevelOuter = bvNone
TabOrder = 5
OnMouseDown = Splitter3MouseDown
OnMouseMove = Splitter1MouseMove
OnMouseUp = Splitter1MouseUp
end
object Panel11: TPanel
Left = 0
Top = 335
Width = 546
Height = 69
Cursor = crHandPoint
Hint = 'Click On the Image To Visit Our Home Page'
Align = alBottom
BevelOuter = bvNone
Caption = 'Panel11'
TabOrder = 6
object Image2: TImage
Left = 0
Top = 2
Width = 511
Height = 68
AutoSize = True
Picture.Data = {<image000.bmp>}
Visible = False
OnClick = Image1Click
end
object Image1: TImage
Left = 0
Top = 2
Width = 475
Height = 60
AutoSize = True
Picture.Data = {<image001.bmp>}
OnClick = Image1Click
end
end
object MainMenu1: TMainMenu
Left = 394
Top = 4
object FileMenu: TMenuItem
Caption = '&File'
object Connect1: TMenuItem
Caption = '&Connect'
OnClick = ConnectBtnClick
end
object Disconnect1: TMenuItem
Caption = '&Disconnect'
Enabled = False
OnClick = DisconnectItemClick
end
object N2: TMenuItem
Caption = '-'
end
object Preferences1: TMenuItem
Caption = '&Preferences'
OnClick = Preferences1Click
end
object N5: TMenuItem
Caption = '-'
end
object Hide1: TMenuItem
Caption = '&Hide'
OnClick = Hide1Click
end
object FileExitItem: TMenuItem
Caption = 'E&xit'
OnClick = FileExitItemClick
end
end
object View1: TMenuItem
Caption = '&View'
object ViewLargeItem: TMenuItem
Caption = 'Lar&ge Icons'
OnClick = ViewLargeItemClick
end
object ViewSmallItem: TMenuItem
Caption = 'S&mall Icons'
OnClick = ViewSmallItemClick
end
object ViewListItem: TMenuItem
Caption = '&List'
OnClick = ViewListItemClick
end
object ViewDetailsItem: TMenuItem
Caption = '&Details'
OnClick = ViewDetailsItemClick
end
object N1: TMenuItem
Caption = '-'
end
object ViewTransferSet1: TMenuItem
Caption = '&View Transfer Manager'
OnClick = SpeedButton1Click
end
object ViewTransferScheduler1: TMenuItem
Caption = 'View Transfer &Scheduler'
OnClick = SpeedButton2Click
end
object ViewLog1: TMenuItem
Caption = 'Vie&w Log'
OnClick = ViewLog1Click
end
end
object Help1: TMenuItem
Caption = '&Help'
object Help2: TMenuItem
Caption = '&Help Contents'
OnClick = Help2Click
end
object Assistant1: TMenuItem
Caption = 'A&ssistant'
OnClick = Assistant1Click
end
object N8: TMenuItem
Caption = '-'
end
object RegistrationForm1: TMenuItem
Caption = '&Registration Form'
OnClick = RegistrationForm1Click
end
object EnterDecodeKey1: TMenuItem
Caption = '&Enter Decode Key'
OnClick = EnterDecodeKey1Click
end
object N6: TMenuItem
Caption = '-'
end
object About1: TMenuItem
Caption = '&About'
OnClick = About1Click
end
end
object httpwwwprimasoftcom1: TMenuItem
Caption = 'http://www.primasoft.com'
Enabled = False
end
end
object FilePopup: TPopupMenu
OnPopup = FilePopupPopup
Left = 498
Top = 234
object Download1: TMenuItem
Caption = 'Do&wnload'
OnClick = DownloadBtnClick
end
object SaveDir1: TMenuItem
Caption = '&Memorize Directory'
OnClick = SaveDir1Click
end
object N3: TMenuItem
Caption = '-'
end
object Rename1: TMenuItem
Caption = '&Rename'
OnClick = Rename1Click
end
object Delete1: TMenuItem
Caption = '&Delete'
OnClick = DeleteItemClick
end
object NewFolder1: TMenuItem
Caption = '&New Folder'
OnClick = FileNewItemClick
end
object N4: TMenuItem
Caption = '-'
end
object Refresh1: TMenuItem
Caption = 'Re&fresh'
end
end
object SaveDialog1: TSaveDialog
Options = [ofOverwritePrompt, ofHideReadOnly]
Title = 'Save File As'
Left = 465
Top = 5
end
object OpenDialog1: TOpenDialog
Title = 'Copy file to server'
Left = 497
Top = 5
end
object SmallImages: TImageList
Left = 361
Top = 5
end
object FilePopup0: TPopupMenu
OnPopup = FilePopup0Popup
Left = 490
Top = 82
object Upload0: TMenuItem
Caption = '&Upload'
OnClick = UploadBtnClick
end
object ViewFile0: TMenuItem
Caption = '&View'
OnClick = ViewFile0Click
end
object Execute0: TMenuItem
Caption = '&Execute'
OnClick = Execute0Click
end
object MenuItem4: TMenuItem
Caption = '-'
end
object Rename0: TMenuItem
Caption = '&Rename'
OnClick = Rename0Click
end
object Delete0: TMenuItem
Caption = '&Delete'
OnClick = Delete0Click
end
object NewFolder0: TMenuItem
Caption = '&New Folder'
OnClick = NewFolder0Click
end
object MenuItem8: TMenuItem
Caption = '-'
end
object Refresh0: TMenuItem
Caption = 'Re&fresh'
OnClick = RefreshBtn0Click
end
end
object Timer1: TTimer
Enabled = False
Interval = 500
OnTimer = Timer1Timer
Left = 328
Top = 2
end
object Timer2: TTimer
Enabled = False
OnTimer = Timer2Timer
Left = 312
Top = 2
end
object Timer3: TTimer
Enabled = False
OnTimer = Timer3Timer
Left = 296
Top = 2
end
object DragMenu1: TPopupMenu
AutoPopup = False
Left = 112
Top = 72
object Move1: TMenuItem
Caption = 'Move'
OnClick = Move1Click
end
object Copy1: TMenuItem
Caption = 'Copy'
OnClick = Copy1Click
end
object N7: TMenuItem
Caption = '-'
end
object Cancel1: TMenuItem
Caption = 'Cancel'
end
end
object DragMenu2: TPopupMenu
AutoPopup = False
Left = 128
Top = 240
object UpDnItem1: TMenuItem
Caption = 'Download'
OnClick = UpDnItem1Click
end
object MenuItem3: TMenuItem
Caption = '-'
end
object MenuItem5: TMenuItem
Caption = 'Cancel'
end
end
object Timer4: TTimer
Enabled = False
Interval = 5000
OnTimer = Timer4Timer
Left = 281
Top = 2
end
object Timer5: TTimer
Interval = 7000
OnTimer = Timer5Timer
Left = 496
Top = 343
end
end